-- This is a simple script designed to do a basic sanity check of testGui
-- Copyright 2004 (C) Ralph Thomas

test = accesslib.findWindow( "ralpht" )

if test then
	print( "got a test object back from accesslib " .. test:name() )
	dim = test:dimensions()
	print( "it's size is: " .. dim.width .. " by " .. dim.height )
	print( "it's position is: (" .. dim.x .. ", " .. dim.y .. ")" )
	print( "it has " .. test:numberChildren() .. " children" )
	i = 0
	while i < test:numberChildren() do
		ch = test:child( i )
		print( "child " .. i .. " is called " .. ch:name() )
	--	print( "trying to press that object" )
	--	ch:sendClick()
		i = i + 1
	end
	print( "attempting to close window" )
	test:sendClose()
else print( "didn't get window back" ) end
